﻿Imports System.Data
Imports System.Data.SqlClient
Imports Entidad
Imports Datos

Public Class NotaCreditoDetalleNegocio

    Dim dao As New NotaCreditoDetalleDatos

    Function obtenerDetallesDBF(ByVal codNota As String) As DataSet
        Return dao.obtenerDetallesDBF(codNota)
    End Function

    Sub registrarNotaCreditoDetalle(ByVal ncd As NotaCreditoDetalle)
        dao.registrarNotaCreditoDetalle(ncd)
    End Sub

    Function obtenerCodigoClienteDetalle(ByVal codNota As String, ByVal tdoc As String) As String
        Return dao.obtenerCodigoClienteDetalle(codNota, tdoc)
    End Function

    Function cantidadDetalleCredito(ByVal codDoc As String, ByVal tdoc As String) As Integer
        Return dao.cantidadDetalleCredito(codDoc, tdoc)
    End Function

End Class
